Minor change to previous refactor

diff --git a/which-key.el b/which-key.el
index 04cf13d1319fe6e46016d036aad6646d4b905aaa..a08d71c4821a03d188332455498bab37a3f9194e 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -678,8 +678,8 @@ BUFFER that follow the key sequence KEY-SEQ."
 
 (defsubst which-key//join-columns (columns)
   "Transpose columns into rows, concat rows into lines and concat rows into page."
-  (let* (;; pad columns to same length and reverse order
-         (padded (reverse (apply (apply-partially #'-pad "") columns)))
+  (let* (;; pad reversed columns to same length
+         (padded (apply (apply-partially #'-pad "") (reverse columns)))
          ;; transpose columns to rows
          (rows (apply #'cl-mapcar #'list padded)))
     ;; join lines by space and rows by newline